main = do
    c <- readFile "C:\\Users\\JeanCarlo\\SkyDrive\\Haskell\\HackerRank\\Domains\\Artificial Intelligence\\Bot Building\\BotClean\\input01.txt"    
    let ls = lines c
        [row, column] = words $ head ls
        board = tail ls
    print c